home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1995 #5 & #6 / Amiga Plus CD - 1995 - No. 5 and 6.iso / pd / netz / term / extras / source / term-source.lha / termData.c < prev    next >
C/C++ Source or Header  |  1995-07-02  |  46KB  |  1,612 lines
  1. /*
  2. **    termData.c
  3. **
  4. **    Global data structures.
  5. **
  6. **    Copyright © 1990-1995 by Olaf `Olsen' Barthel
  7. **        All Rights Reserved
  8. */
  9.  
  10. #include "termGlobal.h"
  11.  
  12. BOOLEAN             DebugFlag;
  13.  
  14.     /* Libraries. */
  15.  
  16. struct ExecBase        *SysBase;
  17. struct DosLibrary    *DOSBase;
  18. struct Library        *GTLayoutBase;
  19.  
  20. struct IntuitionBase    *IntuitionBase;
  21. struct GfxBase        *GfxBase;
  22. struct RxsLib        *RexxSysBase;
  23. struct LocaleBase    *LocaleBase;
  24. struct Library        *GadToolsBase,
  25.             *TimerBase,
  26.             *ConsoleDevice,
  27.             *DiskfontBase,
  28.             *UtilityBase,
  29.             *AslBase,
  30.             *IFFParseBase,
  31.             *CxBase,
  32.             *IconBase,
  33.             *LayersBase,
  34.             *TranslatorBase,
  35.             *WorkbenchBase,
  36.             *AmigaGuideBase,
  37.             *XEmulatorBase,
  38.             *XProtocolBase,
  39.             *DataTypesBase,
  40.             *OwnDevUnitBase;
  41.  
  42. BYTE             Kick30;
  43.  
  44.     /* Timer device. */
  45.  
  46. struct timerequest    *TimeRequest;
  47. struct MsgPort        *TimePort;
  48.  
  49.     /* Console device. */
  50.  
  51. struct IOStdReq        *ConsoleRequest;
  52. struct KeyMap        *KeyMap;
  53. BPTR             KeySegment;
  54.  
  55.     /* Screen & Windows. */
  56.  
  57. struct Screen        *Screen,
  58.             *DefaultPubScreen,
  59.             *SharedScreen;
  60. struct Window        *Window;
  61. LONG             WindowWidth,
  62.              WindowHeight,
  63.              WindowLeft,
  64.              WindowTop;
  65. struct Window        *StatusWindow;
  66. struct Gadget        *StatusGadget;
  67. UWORD             StatusOffset;
  68. struct RastPort         StatusRastPort,
  69.             *StatusRPort;
  70. UWORD             StatusDisplayLeft,
  71.              StatusDisplayTop,
  72.              StatusDisplayWidth,
  73.              StatusDisplayHeight;
  74. APTR             OldWindowPtr;
  75. UBYTE __far         ScreenTitle[80];
  76. UBYTE             DepthMask;
  77. LONG             RenderPens[4],
  78.              MappedPens[2][32],
  79.              SafeTextPen;
  80. struct DrawInfo        *DrawInfo;
  81. LONG             ScreenWidth,
  82.              ScreenHeight;
  83. BYTE             UseMasking;
  84. struct IBox         WindowBox = { -1,-1,-1,-1 };
  85.  
  86. struct BlockMarker    *WindowMarker;
  87. ULONG             ClickSecs,ClickMicros;
  88. BYTE             FirstClick = TRUE,HoldClick = FALSE;
  89. LONG             ClickX,ClickY;
  90.  
  91.     /* Workbench AppWindow support. */
  92.  
  93. struct AppWindow    *WorkbenchWindow;
  94. struct MsgPort        *WorkbenchPort;
  95.  
  96.     /* Graphics rendering. */
  97.  
  98. struct ViewPort        *VPort;
  99. struct RastPort        *RPort;
  100. struct Region        *ClipRegion,
  101.             *OldRegion;
  102. struct TextFont        *GFX,
  103.             *CurrentFont,
  104.             *UserTextFont;
  105. WORD             UserFontHeight,
  106.              UserFontWidth,
  107.              UserFontBase;
  108. UBYTE __far         UserFontName[40];
  109. struct TextFont        *TextFont;
  110. WORD             TextFontHeight,
  111.              TextFontWidth,
  112.              TextFontBase;
  113. struct TTextAttr     TextAttr;
  114. UBYTE __far         TextFontName[40];
  115. struct TTextAttr     UserFont;
  116. struct TagItem         TagDPI[2];
  117. APTR             VisualInfo;
  118. UWORD             FontRightExtend;
  119.  
  120. ULONG            (*  ReadAPen)(struct RastPort *RPort);
  121. ULONG            (*  ReadBPen)(struct RastPort *RPort);
  122. ULONG            (*  ReadDrMd)(struct RastPort *RPort);
  123. ULONG            (*  SetMask)(struct RastPort *RPort,ULONG Mask);
  124.  
  125. UWORD MonoPens[] =
  126. {
  127.     0,1,1,1,1,1,0,0,1,    0,1,1,(UWORD)~0
  128. };
  129.  
  130. UWORD StandardPens[] =
  131. {
  132.     0,1,1,2,1,3,1,0,2,    1,2,1,(UWORD)~0
  133. };
  134.  
  135. UWORD ANSIPens[] =
  136. {
  137.     0,4,7,7,4,6,7,0,6,    0,7,0,(UWORD)~0
  138. };
  139.  
  140. UWORD EGAPens[] =
  141. {
  142.     0,15,15,15,8,7,15,0,7,    0,15,0,(UWORD)~0
  143. };
  144.  
  145. UWORD NewEGAPens[] =
  146. {
  147.     7,0,0,15,0,6,0,7,15,    0,15,0,(UWORD)~0
  148. };
  149.  
  150. UWORD AtomicColours[16] =
  151. {
  152.     0x000,
  153.     0xDDD,
  154.     0x000,
  155.     0x000,
  156.     0x000,
  157.     0x000,
  158.     0x000,
  159.     0x000,
  160.     0x000,
  161.     0x000,
  162.     0x000,
  163.     0x000,
  164.     0x000,
  165.     0x000,
  166.     0x000,
  167.     0x000
  168. };
  169.  
  170. UWORD EGAColours[16] =
  171. {
  172.     0x000,    /* Black. */
  173.     0xA00,    /* Dark red. */
  174.     0x0A0,    /* Dark green. */
  175.     0xA60,    /* Dark yellow (orange). */
  176.     0x00A,    /* Dark blue. */
  177.     0xA0A,    /* Dark magenta.*/
  178.     0x0AA,    /* Dark cyan. */
  179.     0xBBB,    /* Light grey. */
  180.     0x666,    /* Dark grey. */
  181.     0xF00,    /* Red. */
  182.     0x0F0,    /* Green. */
  183.     0xFF0,    /* Yellow. */
  184.     0x00F,    /* Blue. */
  185.     0xF0F,    /* Magenta. */
  186.     0x0FF,    /* Cyan. */
  187.     0xFFF    /* White. */
  188. };
  189.  
  190. UWORD ANSIColours[16] =
  191. {
  192.     0x000,    /* Black. */
  193.     0xF00,    /* Red. */
  194.     0x0F0,    /* Green. */
  195.     0xFF0,    /* Yellow. */
  196.     0x00F,    /* Blue. */
  197.     0xF0F,    /* Magenta. */
  198.     0x0FF,    /* Cyan. */
  199.     0xFFF,    /* White. */
  200.  
  201.     0x000,    /* Black. */
  202.     0xF00,    /* Red. */
  203.     0x0F0,    /* Green. */
  204.     0xFF0,    /* Yellow. */
  205.     0x00F,    /* Blue. */
  206.     0xF0F,    /* Magenta. */
  207.     0x0FF,    /* Cyan. */
  208.     0xFFF    /* White. */
  209. };
  210.  
  211. UWORD             DefaultColours[32],
  212.              BlinkColours[32],
  213.              NormalColours[32],
  214.              StandardColours[32],
  215.              PaletteSize = 16;
  216.  
  217.     /* Line/Column offset tables. */
  218.  
  219. LONG            *OffsetXTable,
  220.             *OffsetYTable;
  221.  
  222.     /* DOS data. */
  223.  
  224. struct Process        *ThisProcess;
  225. struct Process        *StatusProcess;
  226. struct Task        *BufferTask;
  227. struct Process        *RexxProcess;
  228. struct MsgPort        *TermRexxPort;
  229. struct WBStartup    *WBenchMsg;
  230. BPTR             WBenchLock;
  231. struct TermPort        *TermPort;
  232. BYTE             CheckBit    = -1,
  233.              OwnDevBit    = -1;
  234. BYTE             InRexx;
  235. WORD             LimitCount    = -1;
  236. UBYTE __far         LimitMacro[MAX_FILENAME_LENGTH];
  237. LONG             CantQuit;
  238.  
  239.     /* Character conversion. */
  240.  
  241. struct InputEvent    *FakeInputEvent;
  242.  
  243.     /* Serial I/O. */
  244.  
  245. struct IOExtSer        *ReadRequest;
  246. struct IOExtSer        *WriteRequest;
  247. struct MsgPort        *ReadPort;
  248. APTR             ReadBuffer,
  249.              HostReadBuffer;
  250. UBYTE            *SerialMessage;
  251. ULONG             DTERate,
  252.              SerialBufferSize;
  253. BYTE             ProcessIO = TRUE;
  254. BYTE             FirstInvocation;
  255. BYTE             UseRTS_CTS;
  256.  
  257. UBYTE __far         NewDevice[MAX_FILENAME_LENGTH];
  258. LONG             NewUnit;
  259. BYTE             UseNewDevice,
  260.              UseNewUnit;
  261.  
  262. LONG BaudRates[] =
  263. {
  264.     110,    300,    600,    1200,    2400,    4800,    7200,
  265.     9600,    12000,    14400,    19200,    31250,    38400,    57600,
  266.     64000,    76800,    115200,    230400,    345600,    460800,    576000,
  267.     614400,    691200,    806400,    921600
  268. };
  269.  
  270. LONG             NumBaudRates = sizeof(BaudRates) / sizeof(LONG);
  271.  
  272. struct RendezvousSemaphore    RendezvousSemaphore;
  273.  
  274.     /* Localization support. */
  275.  
  276. struct Catalog        *Catalog;
  277. struct Locale        *Locale;
  278.  
  279.     /* Hotkeys. */
  280.  
  281. struct Hotkeys         Hotkeys;
  282.  
  283. struct NewBroker NewTermBroker =
  284. {
  285.     NB_VERSION,
  286.     "term",
  287.     "term © 1990-1994 by Olaf Barthel",
  288.     "Terminal program",
  289.     0,0,0,NULL,0
  290. };
  291.  
  292.     /* Static default fonts. */
  293.  
  294. struct TextAttr DefaultFont =
  295. {
  296.     (UBYTE *)"topaz.font",
  297.     8,
  298.     FS_NORMAL,
  299.     FPF_ROMFONT | FPF_DESIGNED
  300. };
  301.  
  302. struct TextAttr GFXFont =
  303. {
  304.     (UBYTE *)"GFX.font",
  305.     8,
  306.     FS_NORMAL,
  307.     FPF_DISKFONT
  308. };
  309.  
  310.     /* Character lookup tables. */
  311.  
  312. BYTE IsPrintable[256] =
  313. {
  314.     0,0,0,0,0,1,0,1,1,1,1,1,1,1,1,1,
  315.     0,1,0,1,0,0,0,0,0,0,0,1,0,0,0,0,
  316.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  317.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  318.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  319.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  320.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  321.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,
  322.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  323.     0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,
  324.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  325.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  326.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  327.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  328.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  329.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
  330. };
  331.  
  332. BYTE IsGlyph[256] =
  333. {
  334.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  335.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  336.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  337.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  338.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  339.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  340.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  341.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,
  342.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  343.     0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,
  344.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  345.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  346.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  347.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  348.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  349.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
  350. };
  351.  
  352. BYTE CharType[256] =
  353. {
  354.     0,0,0,0,0,0,0,0,0,0,6,0,0,7,0,0,
  355.     0,5,0,4,0,0,0,0,0,0,0,0,0,0,0,0,
  356.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  357.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  358.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  359.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  360.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  361.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  362.     2,2,2,2,2,2,2,2,2,2,0,0,0,0,0,0,
  363.     0,0,0,0,0,3,1,1,1,1,0,0,0,0,0,0,
  364.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  365.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  366.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  367.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  368.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  369.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  370. };
  371.  
  372.     /* ISO -> IBM font conversion. */
  373.  
  374. UBYTE __far IBMConversion[256] =
  375. {
  376.     0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x07,0x08,0x09,0x0A,0x0B,0x0C,0x0D,0x00,0x00,
  377.     0x00,0x11,0x00,0x13,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x1B,0x00,0x00,0x00,0x00,
  378.     0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,
  379.     0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,
  380.     0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B,0x4C,0x4D,0x4E,0x4F,
  381.     0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,
  382.     0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,
  383.     0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F,
  384.     0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
  385.     0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
  386.     0x00,0xAD,0x9B,0x9C,0x00,0x9D,0x00,0x15,0x00,0x00,0xA6,0x00,0x00,0x00,0xAE,0x00,
  387.     0xF8,0xF1,0xFD,0x00,0x00,0xE6,0x14,0xF9,0x00,0x00,0xA7,0xAF,0xAC,0xAB,0x00,0xA8,
  388.     0x00,0x00,0x00,0x00,0x8E,0x8F,0x92,0x80,0x00,0x90,0x00,0x00,0x00,0x00,0x00,0x00,
  389.     0x00,0xA5,0x00,0x00,0x00,0x00,0x99,0x00,0x00,0x00,0x00,0x00,0x9A,0x00,0x00,0xE1,
  390.     0x85,0xA0,0x83,0x00,0x84,0x86,0x91,0x87,0x8A,0x82,0x88,0x89,0x8D,0xA1,0x8C,0x00,
  391.     0x00,0xA4,0x95,0xA2,0x93,0x00,0x94,0x00,0x00,0x97,0xA3,0x96,0x81,0x00,0x00,0x98
  392. };
  393.  
  394.     /* IBM -> ISO font conversion. */
  395.  
  396. UBYTE __far ISOConversion[256] =
  397. {
  398.     0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x07,0x08,0x09,0x0A,0x0B,0x0C,0x0D,0x00,0x00,
  399.     0x00,0x11,0x00,0x13,0xB6,0xA7,0x00,0x00,0x00,0x00,0x00,0x1B,0x00,0x00,0x00,0x00,
  400.     0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,
  401.     0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,
  402.     0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B,0x4C,0x4D,0x4E,0x4F,
  403.     0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,
  404.     0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,
  405.     0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F,
  406.     0xC7,0xFC,0xE9,0xE2,0xE4,0xE0,0xE5,0xE7,0xEA,0xEB,0xE8,0x00,0xEE,0xEC,0xC4,0xC5,
  407.     0xC9,0xE6,0xC6,0xF4,0xF6,0xF2,0xFB,0xF9,0xFF,0xD6,0xDC,0xA2,0xA3,0xA5,0x00,0x00,
  408.     0xE1,0xED,0xF3,0xFA,0xF1,0xD1,0xAA,0xBA,0xBF,0x00,0x00,0xBD,0xBC,0xA1,0xAE,0xBB,
  409.     0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
  410.     0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
  411.     0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
  412.     0x00,0xDF,0x00,0x00,0x00,0x00,0xB5,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
  413.     0x00,0xB1,0x00,0x00,0x00,0x00,0x00,0x00,0xB0,0xB7,0x00,0x00,0x00,0xB2,0x00,0x00
  414. };
  415.  
  416.     /* Table of graphics characters. */
  417.  
  418. BYTE GfxTable[256] =
  419. {
  420.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  421.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  422.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  423.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  424.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  425.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  426.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  427.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  428.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  429.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  430.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  431.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  432.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  433.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  434.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  435.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  436. };
  437.  
  438.     /* Special character treatment. */
  439.  
  440. struct SpecialKey SpecialKeys[13] =
  441. {
  442.     BEL,    DoBeep,        /* Ring the bell. */
  443.     XON,    DoxON,        /* Flow control - stop output. */
  444.     BKS,    DoBackspace,    /* Erase a character. */
  445.     ENT,    DoLF_FF_VT,    /* Enter key. */
  446.     FFD,    DoFF,        /* Form feed. */
  447.     VTB,    DoLF_FF_VT,    /* Vertical tab (huh?). */
  448.     RET,    DoCR,        /* Return key. */
  449.     TAB,    DoTab,        /* Move to next tab stop. */
  450.     SI,    DoShiftIn,    /* Change to graphics mode */
  451.     SO,    DoShiftOut,    /* Change out of graphics mode. */
  452.     ENQ,    DoEnq,        /* Transmit answerback message. */
  453.     ESC,    DoEsc,        /* Start new control sequence. */
  454.     CSI,    DoCsi        /* Start new control sequence. */
  455. };
  456.  
  457. JUMP *SpecialTable;
  458.  
  459. BYTE AbortMap[256] =
  460. {
  461.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  462.     0,0,0,0,0,0,0,0,1,0,1,2,0,0,0,0,
  463.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  464.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  465.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  466.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  467.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  468.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  469.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  470.     0,0,0,0,0,0,0,0,0,0,0,3,0,0,0,0,
  471.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  472.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  473.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  474.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  475.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  476.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  477. };
  478.  
  479. JUMP *AbortTable;
  480.  
  481. VOID (*  ConDump)(STRPTR,LONG);
  482. VOID (*  ConOutput)(STRPTR,LONG);
  483. VOID (*  ConProcessData)(register STRPTR,register LONG);
  484.  
  485.     /* Shared global string formatting buffer. */
  486.  
  487. UBYTE __far SharedBuffer[512];
  488.  
  489.     /* Some more handy buffers. */
  490.  
  491. UBYTE __far ARexxCommandBuffer[256],AmigaDOSCommandBuffer[256],DialNumberBuffer[256];
  492.  
  493.     /* Screen pull-down-menu. */
  494.  
  495. struct NewMenu TermMenu[] =
  496. {
  497.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  498.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)0},
  499.     {   NM_SUB, NULL,         0 , 0,        0, (APTR)MEN_SAVE_AS_PICTURE},
  500.     {   NM_SUB, NULL,         0 , 0,        0, (APTR)MEN_SAVE_AS_TEXT},
  501.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  502.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)0},
  503.     {   NM_SUB, NULL,         0 , 0,        0, (APTR)MEN_PRINT_SCREEN},
  504.     {   NM_SUB, NULL,         0 , 0,        0, (APTR)MEN_PRINT_SCREEN_AS_GFX},
  505.     {   NM_SUB, NULL,         0 , 0,        0, (APTR)MEN_PRINT_CLIP},
  506.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  507.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)0},
  508.     {   NM_SUB, NULL,         0 , TICK,    0, (APTR)MEN_CAPTURE_TO_FILE},
  509.     {   NM_SUB, NULL,         0 , TICK,    0, (APTR)MEN_CAPTURE_TO_PRINTER},
  510.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  511.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_ICONIFY},
  512.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  513.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_ABOUT},
  514.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  515.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_QUIT},
  516.  
  517.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  518.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_COPY},
  519.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_PASTE},
  520.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_CLEAR},
  521.  
  522.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  523.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_EXECUTE_DOS_COMMAND},
  524.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_EXECUTE_REXX_COMMAND},
  525.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  526.     {  NM_ITEM, NULL,         0 , TICK,    0, (APTR)MEN_RECORD},
  527.     {  NM_ITEM, NULL,         0 , TICK,    0, (APTR)MEN_RECORD_LINE},
  528.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  529.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_EDIT_TRAPS},
  530.     {  NM_ITEM, NULL,         0 , TICK,    0, (APTR)MEN_DISABLE_TRAPS},
  531.  
  532.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  533.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_PHONEBOOK},
  534.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_REDIAL},
  535.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_DIAL_NUMBER},
  536.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  537.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SEND_BREAK},
  538.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_HANG_UP},
  539.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  540.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_WAIT},
  541.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  542.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_FLUSH_BUFFER},
  543.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_RELEASE_DEVICE},
  544.  
  545.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  546.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_UPLOAD_ASCII},
  547.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_DOWNLOAD_ASCII},
  548.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  549.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_UPLOAD_TEXT},
  550.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_DOWNLOAD_TEXT},
  551.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_EDIT_AND_UPLOAD_TEXT},
  552.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  553.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_UPLOAD_BINARY},
  554.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_DOWNLOAD_BINARY},
  555.  
  556.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  557.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_CLEAR_BUFFER},
  558.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_DISPLAY_BUFFER},
  559.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_CLOSE_BUFFER},
  560.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  561.     {  NM_ITEM, NULL,         0 , TICK,    0, (APTR)MEN_FREEZE_BUFFER},
  562.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  563.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_OPEN_BUFFER},
  564.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SAVE_BUFFER_AS},
  565.  
  566.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  567.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_CLEAR_SCREEN},
  568.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_RESET_FONT},
  569.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_RESET_STYLES},
  570.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_RESET_TERMINAL},
  571.  
  572.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  573.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SERIAL},
  574.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_MODEM},
  575.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SCREEN},
  576.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_TERMINAL},
  577.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SET_EMULATION},
  578.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_CLIPBOARD},
  579.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_CAPTURE},
  580.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_COMMANDS},
  581.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_MISC},
  582.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_PATH},
  583.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_TRANSFER_PROTOCOL},
  584.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  585.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_TRANSFER},
  586.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_TRANSLATION},
  587.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_MACROS},
  588.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_CURSORKEYS},
  589.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_FAST_MACROS},
  590.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_HOTKEYS},
  591.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SPEECH},
  592.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SOUND},
  593.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_RATES},
  594.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SET_CONSOLE},
  595.     {  NM_ITEM, NM_BARLABEL,     0 , 0,        0, (APTR)0},
  596.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_OPEN_SETTINGS},
  597.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SAVE_SETTINGS},
  598.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_SAVE_SETTINGS_AS},
  599.  
  600.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)0},
  601.     {  NM_ITEM, NULL,         0 , TICK,    0, (APTR)MEN_STATUS_WINDOW},
  602.     {  NM_ITEM, NULL,         0 , TICK,    0, (APTR)MEN_REVIEW_WINDOW},
  603.     {  NM_ITEM, NULL,         0 , CHECKIT,    0, (APTR)MEN_PACKET_WINDOW},
  604.     {  NM_ITEM, NULL,         0 , TICK,    0, (APTR)MEN_CHAT_LINE},
  605.     {  NM_ITEM, NULL,         0 , TICK,    0, (APTR)MEN_FAST_MACROS_WINDOW},
  606.     {  NM_ITEM, NULL,         0 , 0,        0, (APTR)MEN_UPLOAD_QUEUE_WINDOW},
  607.  
  608.     { NM_TITLE, NULL,         0 , 0,        0, (APTR)MEN_EXTRA_DIAL},
  609.     {   NM_END, 0,             0 , 0,        0, (APTR)0}
  610. };
  611.  
  612. struct Menu    *Menu;
  613. struct Image    *AmigaGlyph,
  614.         *CheckGlyph;
  615.  
  616. LONG MenuLabels[] =
  617. {
  618.     MSG_TERMDATA_PROJECT_MEN,
  619.     MSG_TERMDATA_SAVE_SCREEN_AS_MEN,
  620.     MSG_TERMDATA_SAVE_AS_PICTURE_MEN,
  621.     MSG_TERMDATA_SAVE_AS_TEXT_MEN,
  622.     MSG_TERMDATA_PRINT_MEN,
  623.     MSG_TERMDATA_PRINT_SCREEN_MEN,
  624.     MSG_TERMDATA_PRINT_SCREEN_GFX_MEN,
  625.     MSG_TERMDATA_PRINT_CLIP_MEN,
  626.     MSG_TERMDATA_CAPTURE_MEN,
  627.     MSG_TERMDATA_CAPTURE_TO_FILE_MEN,
  628.     MSG_TERMDATA_CAPTURE_TO_PRINTER_MEN,
  629.     MSG_TERMDATA_ICONIFY_MEN,
  630.     MSG_TERMDATA_ABOUT_MEN,
  631.     MSG_TERMDATA_QUIT_MEN,
  632.  
  633.     MSG_TERMDATA_EDIT_MEN,
  634.     MSG_TERMDATA_COPY_MEN,
  635.     MSG_TERMDATA_PASTE_MEN,
  636.     MSG_TERMDATA_CLEAR_MEN,
  637.  
  638.     MSG_TERMDATA_COMMANDS_MEN,
  639.     MSG_TERMDATA_EXECUTE_DOS_COMMAND_MEN,
  640.     MSG_TERMDATA_EXECUTE_REXX_COMMAND_MEN,
  641.     MSG_TERMDATA_RECORD_MEN,
  642.     MSG_TERMDATA_RECORD_LINE_MEN,
  643.     MSG_TERMDATA_EDIT_TRAPS_MEN,
  644.     MSG_TERMDATA_DISABLE_TRAPS_MEN,
  645.  
  646.     MSG_TERMDATA_PHONE_MEN,
  647.     MSG_TERMDATA_PHONEBOOK_MEN,
  648.     MSG_TERMDATA_REDIAL_MEN,
  649.     MSG_TERMDATA_DIAL_NUMBER_MEN,
  650.     MSG_TERMDATA_SEND_BREAK_MEN,
  651.     MSG_TERMDATA_HANG_UP_MEN,
  652.     MSG_TERMDATA_WAIT_MEN,
  653.     MSG_TERMDATA_FLUSH_BUFFER_MEN,
  654.     MSG_TERMDATA_RELEASE_DEVICE_MEN,
  655.  
  656.     MSG_TERMDATA_XFER_MEN,
  657.     MSG_TERMDATA_UPLOAD_ASCII_MEN,
  658.     MSG_TERMDATA_DOWNLOAD_ASCII_MEN,
  659.     MSG_TERMDATA_UPLOAD_TEXT_MEN,
  660.     MSG_TERMDATA_DOWNLOAD_TEXT_MEN,
  661.     MSG_TERMDATA_EDIT_AND_UPLOAD_TEXT_MEN,
  662.     MSG_TERMDATA_UPLOAD_BINARY_MEN,
  663.     MSG_TERMDATA_DOWNLOAD_BINARY_MEN,
  664.  
  665.     MSG_TERMDATA_BUFFER_MEN,
  666.     MSG_TERMDATA_CLEAR_BUFFER_MEN,
  667.     MSG_TERMDATA_DISPLAY_BUFFER_MEN,
  668.     MSG_TERMDATA_CLOSE_BUFFER_MEN,
  669.     MSG_TERMDATA_FREEZE_BUFFER_MEN,
  670.     MSG_TERMDATA_OPEN_BUFFER_MEN,
  671.     MSG_TERMDATA_SAVE_BUFFER_AS_MEN,
  672.  
  673.     MSG_TERMDATA_SCREEN_MEN,
  674.     MSG_TERMDATA_CLEAR_SCREEN_MEN,
  675.     MSG_TERMDATA_RESET_FONT_MEN,
  676.     MSG_TERMDATA_RESET_STYLES_MEN,
  677.     MSG_TERMDATA_RESET_TERMINAL_MEN,
  678.  
  679.     MSG_TERMDATA_SETTINGS_MEN,
  680.     MSG_TERMDATA_SERIAL_MEN,
  681.     MSG_TERMDATA_MODEM_MEN,
  682.     MSG_TERMDATA_SCREEN_PREFS_MEN,
  683.     MSG_TERMDATA_TERMINAL_MEN,
  684.     MSG_TERMDATA_SET_EMULATION_MEN,
  685.     MSG_TERMDATA_CLIPBOARD_PREFS_MEN,
  686.     MSG_TERMDATA_CAPTURE_PREFS_MEN,
  687.     MSG_TERMDATA_COMMANDS_PREFS_MEN,
  688.     MSG_TERMDATA_MISC_MEN,
  689.     MSG_TERMDATA_PATH_MEN,
  690.     MSG_TERMDATA_TRANSFER_PROTOCOL_MEN,
  691.     MSG_TERMDATA_TRANSFER_MEN,
  692.     MSG_TERMDATA_TRANSLATION_MEN,
  693.     MSG_TERMDATA_MACROS_MEN,
  694.     MSG_TERMDATA_CURSORKEYS_MEN,
  695.     MSG_TERMDATA_FAST_MACROS_MEN,
  696.     MSG_TERMDATA_HOTKEYS_MEN,
  697.     MSG_TERMDATA_SPEECH_MEN,
  698.     MSG_TERMDATA_SOUND_MEN,
  699.     MSG_AREACODES_MEN,
  700.     MSG_TERMDATA_SET_CONSOLE_MEN,
  701.     MSG_TERMDATA_OPEN_SETTINGS_MEN,
  702.     MSG_TERMDATA_SAVE_SETTINGS_MEN,
  703.     MSG_TERMDATA_SAVE_SETTINGS_AS_MEN,
  704.  
  705.     MSG_TERMDATA_WINDOWS_MEN,
  706.     MSG_TERMDATA_STATUS_WINDOW_MEN,
  707.     MSG_TERMDATA_REVIEW_WINDOW_MEN,
  708.     MSG_TERMDATA_PACKET_WINDOW_MEN,
  709.     MSG_TERMDATA_CHAT_LINE_MEN,
  710.     MSG_TERMDATA_FAST_MACROS_WINDOW_MEN,
  711.     MSG_TERMDATA_UPLOAD_QUEUE_WINDOW_MEN,
  712.  
  713.     MSG_TERMDATA_DIALING_MEN
  714. };
  715.  
  716.     /* Pointer. */
  717.  
  718. UWORD __chip Stopwatch[(1 + 16 + 1) * 2] =
  719. {
  720.     0x0000,0x0000,
  721.  
  722.     0x0400,0x07C0,
  723.     0x0000,0x07C0,
  724.     0x0100,0x0380,
  725.     0x0000,0x07E0,
  726.     0x07C0,0x1FF8,
  727.     0x1FF0,0x3FEC,
  728.     0x3FF8,0x7FDE,
  729.     0x3FF8,0x7FBE,
  730.     0x7FFC,0xFF7F,
  731.     0x7EFC,0xFFFF,
  732.     0x7FFC,0xFFFF,
  733.     0x3FF8,0x7FFE,
  734.     0x3FF8,0x7FFE,
  735.     0x1FF0,0x3FFC,
  736.     0x07C0,0x1FF8,
  737.     0x0000,0x07E0,
  738.  
  739.     0x0000,0x0000
  740. };
  741.  
  742.     /* Cross-hatch pattern. */
  743.  
  744. ULONG __chip Crosshatch = 0x5555AAAA;
  745.  
  746.     /* Ghosting pattern, slightly different from the cross-hatch pattern. */
  747.  
  748. ULONG __chip Ghosting = 0x44441111;
  749.  
  750.     /* Configuration. */
  751.  
  752. struct Configuration    *Config,
  753.             *PrivateConfig,
  754.             *BackupConfig;
  755. struct SpeechConfig     SpeechConfig;
  756. BYTE             English = TRUE;
  757. BYTE             Status;
  758. BYTE             Online,WasOnline;
  759. ULONG             OnlineMinutes,OnlinePlus;
  760. UWORD             PublicModes;
  761. struct SignalSemaphore     OnlineSemaphore;
  762.  
  763. UBYTE __far         LastConfig[MAX_FILENAME_LENGTH];
  764. UBYTE __far         DefaultPubScreenName[MAXPUBSCREENNAME + 1],
  765.              SomePubScreenName[MAXPUBSCREENNAME + 1];
  766.  
  767.     /* Capture file. */
  768.  
  769. struct Buffer        *FileCapture;
  770. BPTR             PrinterCapture;
  771. UBYTE __far         CaptureName[MAX_FILENAME_LENGTH];
  772. BYTE             StandardPrinterCapture,
  773.              ControllerActive;
  774. LONG             BufferFlushCount;
  775. VOID            (* __regargs CaptureData)(register APTR Data,register LONG Size);
  776.  
  777.     /* Buffer. */
  778.  
  779. UBYTE            **BufferLines;
  780. LONG             Lines;
  781. struct SignalSemaphore    *BufferSemaphore,
  782.              BufferTaskSemaphore;
  783. LONG             MaxLines = 100;
  784. LONG             BufferSpace;
  785. BYTE             BufferClosed;
  786. BYTE             BufferFrozen;
  787.  
  788. struct MinList         ReviewBufferHistory,
  789.              TextBufferHistory;
  790.  
  791.     /* Sound support.c */
  792.  
  793. struct SoundConfig     SoundConfig;
  794. BYTE             SoundChanged = FALSE;
  795.  
  796.     /* Phonebook. */
  797.  
  798. struct PhoneEntry    **Phonebook;
  799. LONG             PhoneSize;
  800. LONG             NumPhoneEntries;
  801. UBYTE __far         PhonePassword[256];
  802. BYTE             PhonePasswordUsed,
  803.              RebuildMenu;
  804. UBYTE __far         Password[100];
  805. UBYTE __far         UserName[100];
  806. UBYTE __far         GlobalPassword[256];
  807.  
  808. UBYTE __far         CurrentBBSName[40],
  809.              CurrentBBSNumber[100],
  810.              CurrentBBSComment[100];
  811.  
  812. UBYTE __far         LastPhone[MAX_FILENAME_LENGTH];
  813. UBYTE __far         LastKeys[MAX_FILENAME_LENGTH];
  814. UBYTE __far         LastMacros[MAX_FILENAME_LENGTH];
  815. UBYTE __far         LastCursorKeys[MAX_FILENAME_LENGTH];
  816. UBYTE __far         LastTranslation[MAX_FILENAME_LENGTH];
  817. UBYTE __far         LastSpeech[MAX_FILENAME_LENGTH];
  818. UBYTE __far         LastSound[MAX_FILENAME_LENGTH];
  819.  
  820. struct MacroKeys    *MacroKeys;
  821. struct CursorKeys    *CursorKeys;
  822.  
  823.     /* Console stuff. */
  824.  
  825. UBYTE            *StripBuffer;
  826. UWORD             LastLine,LastColumn,LastPixel;
  827. UWORD             LastPrintableColumn;
  828. UWORD             LastPrintablePixel;
  829. UWORD             CharCellNominator,CharCellDenominator;
  830. UBYTE             CurrentFontScale,FontScalingRequired,CurrentCharWidth;
  831. UBYTE             Charset,Attributes,FgPen,BgPen;
  832. WORD             CursorX,CursorY,Top,Bottom;
  833. BYTE             UseRegion,RegionSet,InSequence,Quiet,Blocking;
  834. BYTE            *TabStops;
  835. UWORD             TabStopMax;
  836. BYTE             CharMode[2];
  837.  
  838. BYTE             ResetDisplay,
  839.              DisplayReopened,
  840.              FixPubScreenMode,
  841.              FixScreenSize,
  842.              Apocalypse;
  843.  
  844. struct SignalSemaphore     TerminalSemaphore;    // Protection from shape changers
  845.  
  846.     /* Flow filter. */
  847.  
  848. STRPTR             AttentionBuffers[SCAN_COUNT];
  849. BYTE             BaudPending,FullCheck,UseFlow;
  850. UBYTE             BaudBuffer[80],BaudCount;
  851.  
  852. struct FlowInfo         FlowInfo;
  853.  
  854. STRPTR             DataHold;
  855. LONG             DataSize;
  856.  
  857.     /* Transfer data. */
  858.  
  859. BYTE             BinaryTransfer;
  860. LONG             TransferAbortState;
  861. WORD             TransferAbortCount;
  862. LONG             TransferBits;
  863.  
  864. VOID            (*  ConTransfer)(STRPTR,LONG);
  865.  
  866. UBYTE            *DownloadPath;
  867. BYTE             Uploading;
  868. BYTE             DidTransfer;
  869.  
  870. struct Window        *TransferWindow,
  871.             *TransferPerfWindow;
  872. UBYTE __far         TransferTitleBuffer[256];
  873. BOOLEAN             TransferZoomed = FALSE;
  874. STRPTR             TransferWindowTitle;
  875.  
  876. struct LayoutHandle    *TransferHandle;
  877. struct Menu        *TransferMenu;
  878. struct Gadget        *TransferGadgetArray[GAD_TRANSFER_SKIP + 1];
  879. struct List         TransferInfoList;
  880.  
  881. struct FileTransferInfo    *FileTransferInfo;
  882.  
  883. struct XPR_IO        *XprIO;
  884. UBYTE __far         ProtocolOptsBuffer[256];
  885. BYTE             NewLibrary,NewOptions;
  886. BOOLEAN             XPRCommandSelected;
  887. UBYTE __far         LastXprLibrary[MAX_FILENAME_LENGTH];
  888. UBYTE __far         TransferProtocolName[40];
  889. UBYTE __far         ConvNumber[30],ConvNumber10[30];
  890. BYTE             UsesZModem,SendAbort,TransferAborted,TransferFailed,TransferError;
  891.  
  892.     /* The standard ZModem cancel sequence
  893.      * (ten CAN chars followed by ten
  894.      * BS chars).
  895.      */
  896.  
  897. UBYTE ZModemCancel[] =
  898. {
  899.     24,24,24,24,24,24,24,24,24,24,
  900.      8, 8, 8, 8, 8, 8, 8, 8, 8, 8
  901. };
  902.  
  903.     /* Pay per minute. */
  904.  
  905. LONG             CurrentPay;
  906. LONG             PayPerUnit[2];
  907. LONG             SecPerUnit[2];
  908. LONG             WhichUnit;
  909. struct PhoneEntry    *ChosenEntry;
  910. BYTE             ChosenInUse;
  911. struct List        *PatternList,
  912.             *ChosenPattern;
  913. UBYTE __far         LastPattern[MAX_FILENAME_LENGTH];
  914. BYTE             PatternsChanged;
  915. struct SignalSemaphore     PatternSemaphore;
  916.  
  917.     /* Execute a command/script. */
  918.  
  919. UBYTE __far         WindowName[256];
  920.  
  921. ULONG             BlockNestCount;
  922. BYTE             WeAreBlocking;
  923.  
  924.     /* Dial list. */
  925.  
  926. struct List        *DialList;
  927. BYTE             SendStartup;
  928. LONG             FirstDialMenu = -1;
  929. struct RexxMsg        *DialMsg;
  930.  
  931.     /* TermMain data. */
  932.  
  933. BYTE             ReleaseSerial;
  934. BYTE             ResetSerial;
  935. BYTE             MainTerminated,
  936.              IconTerminated = TRUE,
  937.              DoIconify = FALSE,
  938.              DoDial = DIAL_IGNORE,
  939.              KeepQuiet;
  940.  
  941. BYTE             ConfigChanged,PhonebookChanged,TranslationChanged,
  942.              MacroChanged,CursorKeysChanged,FastMacrosChanged,
  943.              HotkeysChanged,SpeechChanged,BufferChanged;
  944.  
  945.     /* Upload/Download paths. */
  946.  
  947. UBYTE __far         LastDownload[MAX_FILENAME_LENGTH];
  948. UBYTE __far         LastUpload[MAX_FILENAME_LENGTH];
  949.  
  950.     /* String gadget hooks. */
  951.  
  952. struct Window        *CommandWindow;
  953. struct Gadget        *CommandGadget;
  954.  
  955. BYTE             ClipInput,
  956.              ClipXerox,
  957.              ClipPrefix;
  958.  
  959.     /* Text sending. */
  960.  
  961. UBYTE __far         SendPrompt[256];
  962. LONG             SendPromptLen;
  963. BYTE            (*  SendLine)(register STRPTR,register LONG);
  964.  
  965.     /* Packet window. */
  966.  
  967. struct Window        *PacketWindow;
  968. struct Gadget        *PacketGadgetArray[2];
  969. struct Menu        *PacketMenu;
  970. struct Gadget        *PacketGadgetList;
  971. struct List         PacketHistoryList;
  972.  
  973.     /* Some more colour control flags. */
  974.  
  975. BYTE             Initializing,LoadColours;
  976.  
  977.     /* The character raster. */
  978.  
  979. UBYTE            *Raster,*RasterAttr;
  980. LONG             RasterWidth,RasterHeight;
  981. BYTE             Marking;
  982. struct SignalSemaphore    *RasterSemaphore;
  983. BYTE             RasterEnabled = TRUE;
  984.  
  985.     /* Generic lists. */
  986.  
  987. struct GenericList    *GenericListTable[GLIST_COUNT];
  988.  
  989.     /* File version test. */
  990.  
  991. ULONG VersionProps[2] =
  992. {
  993.     ID_TERM,
  994.     ID_VERS
  995. };
  996.  
  997.     /* Window stack. */
  998.  
  999. struct Window        *TopWindow;
  1000.  
  1001. struct Window        *WindowStack[5];
  1002. WORD             WindowStackPtr;
  1003.  
  1004.     /* Global term ID. */
  1005.  
  1006. LONG             TermID;
  1007. UBYTE __far         TermIDString[MAXPUBSCREENNAME + 1];
  1008. UBYTE __far         RexxPortName[256];
  1009.  
  1010.     /* Fast! macros. */
  1011.  
  1012. struct List         FastMacroList;
  1013. LONG             FastMacroCount;
  1014. UBYTE __far         LastFastMacros[MAX_FILENAME_LENGTH];
  1015. struct Window        *FastWindow;
  1016. WORD             FastWindowLeft        = -1,
  1017.              FastWindowTop        = -1,
  1018.              FastWindowHeight    = -1;
  1019.  
  1020.     /* Double-buffered file locking. */
  1021.  
  1022. struct List         DoubleBufferList;
  1023. struct SignalSemaphore     DoubleBufferSemaphore;
  1024.  
  1025.     /* XEM interface. */
  1026.  
  1027. struct XEM_IO        *XEM_IO;
  1028. ULONG             XEM_Signal;
  1029. struct XEmulatorHostData XEM_HostData;
  1030. UBYTE            *OptionTitle;
  1031. struct List         XEM_MacroList;
  1032. struct XEmulatorMacroKey *XEM_MacroKeys;
  1033. UBYTE __far         EmulationName[40];
  1034.  
  1035. struct List         EmptyList;
  1036.  
  1037.     /* Screen scrolling support. */
  1038.  
  1039. UWORD             ScrollLineFirst,ScrollLineLast,
  1040.              ScrollLineCount;
  1041. struct ScrollLineInfo    *ScrollLines;
  1042.  
  1043.     /* term review buffer. */
  1044.  
  1045. struct Window        *ReviewWindow;
  1046.  
  1047.     /* Background information. */
  1048.  
  1049. ULONG             BytesIn,
  1050.              BytesOut;
  1051. struct DateStamp     SessionStart;
  1052. struct Window        *InfoWindow;
  1053.  
  1054.     /* Gadget support routines */
  1055.  
  1056. LONG             InterWidth,
  1057.              InterHeight;
  1058.  
  1059.     /* Character translation. */
  1060.  
  1061. struct TranslationEntry    **SendTable,
  1062.             **ReceiveTable;
  1063.  
  1064.     /* Window alignment information. */
  1065.  
  1066. struct WindowInfo WindowInfoTable[WINDOW_COUNT] =
  1067. {
  1068.     WINDOW_PACKET,    WC_ALIGNBELOW|WC_EXPANDWIDTH,    0,0,0,0,
  1069.     WINDOW_STATUS,    WC_ALIGNRIGHT,            0,0,0,0,
  1070.     WINDOW_FILE,    NULL,                0,0,0,0,
  1071.     WINDOW_REVIEW,    WC_ALIGNTOP|WC_EXPANDWIDTH,    0,0,0,0,
  1072.     WINDOW_FAST,    WC_ALIGNTOP|WC_ALIGNSIDE,    0,0,0,0,
  1073.     WINDOW_FONT,    NULL,                0,0,0,0,
  1074.     WINDOW_SCREEN,    NULL,                0,0,0,0,
  1075.     WINDOW_PERF,    NULL,                0,0,0,0,
  1076.     WINDOW_MAIN,    NULL,                -1,-1,0,0
  1077. };
  1078.  
  1079.     /* New user interface. */
  1080.  
  1081. extern ULONG HookEntry();
  1082.  
  1083. struct Hook LocaleHook =
  1084. {
  1085.     {NULL},
  1086.     (HOOKFUNC)HookEntry,
  1087.     (HOOKFUNC)LocaleHookFunc
  1088. };
  1089.  
  1090.     /* AmigaGuide hook. */
  1091.  
  1092. struct Hook GuideHook =
  1093. {
  1094.     {NULL},
  1095.     (HOOKFUNC)GuideSetupHook
  1096. };
  1097.  
  1098.     /* Special queue management. */
  1099.  
  1100. struct MsgQueue    *SpecialQueue;
  1101.  
  1102.     /* Phonebook edit list support. */
  1103.  
  1104. STRPTR        *EditLabels;
  1105. struct List    *EditList;
  1106. struct Node    *EditNode;
  1107.  
  1108.     /* Window and Screen backfill hook. */
  1109.  
  1110. struct Hook BackfillHook =
  1111. {
  1112.     {NULL},
  1113.     (HOOKFUNC)BackfillRoutine
  1114. };
  1115.  
  1116.     /* Intercept data going through SerWrite. */
  1117.  
  1118. BOOLEAN (*SerWriteBypass)(STRPTR Buffer,LONG Size);
  1119.  
  1120.     /* The incredibly shrinking file name. */
  1121.  
  1122. UBYTE __far    ShrunkenName[MAX_FILENAME_LENGTH],
  1123.         OriginalName[MAX_FILENAME_LENGTH];
  1124.  
  1125.     /* Terminal emulation task. */
  1126.  
  1127. struct MsgQueue        *TerminalQueue;
  1128.  
  1129.     /* DNet/ParaBIT support. */
  1130. /*
  1131. struct DChannel        *NetChannel;
  1132. struct MsgPort        *NetListen;
  1133. ULONG             NetSigMask;
  1134. BOOLEAN             NetTerminated;
  1135. */
  1136.  
  1137.     /* AppIcon data. */
  1138.  
  1139. STATIC UWORD DropData[304] =
  1140. {
  1141.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  1142.     0x0000,0x0000,0x2000,0x1000,0x0000,0x0000,0xF000,0x1000,
  1143.     0x0000,0x0001,0x9800,0x1000,0x0000,0x0003,0x1C3E,0x1000,
  1144.     0x0000,0x0003,0xFC30,0x1000,0x0000,0x0000,0x01FF,0x1000,
  1145.     0x0000,0x0000,0x01FC,0x1000,0x0000,0x0060,0x0000,0x1000,
  1146.     0x0000,0x001F,0xFFFF,0xF000,0x0000,0x0000,0x0000,0x0000,
  1147.     0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0700,0x0000,
  1148.     0x07FF,0xFFFE,0x0700,0x0000,0x07FF,0xFFEE,0x0700,0x0000,
  1149.     0x0755,0x555E,0x0700,0x0000,0x07AA,0xAAAE,0x1FC0,0x0000,
  1150.     0x0755,0x555E,0x0F80,0x0000,0x07AA,0xAAAE,0x0700,0x0000,
  1151.     0x0755,0x555E,0x0200,0x0000,0x07AA,0xAAAE,0x0000,0x0000,
  1152.     0x0755,0x555E,0x0000,0x0000,0x07FF,0xFFFE,0x0000,0x0000,
  1153.     0x07FF,0xFFFE,0x0000,0x0000,0x07FF,0xFFFC,0x0000,0x0000,
  1154.     0x0000,0x0000,0x0000,0x0000,0x7FFF,0xFFFF,0xE000,0x0000,
  1155.     0x7FFF,0xFEFF,0xE000,0x0000,0x7FFF,0xFEF0,0x0000,0x0000,
  1156.     0x7FE5,0x54E7,0xFF80,0x0000,0x7FFF,0xFF8E,0x0FC0,0x0000,
  1157.     0x7FFF,0xFFBD,0xFCF0,0x0000,0x0FFF,0xFFFF,0xFEE0,0x0000,
  1158.     0x0FFF,0xFFFB,0xD700,0x0000,0x0000,0x0007,0xAF80,0x0000,
  1159.     0x0000,0x000F,0xFF80,0x0000,0x0000,0x0007,0xFF00,0x0000,
  1160.  
  1161.     0x0000,0x007F,0xFFFE,0x0000,0x0000,0x007F,0xFFFF,0x8000,
  1162.     0x0000,0x0060,0x20FF,0xE000,0x0000,0x0060,0xF0FF,0xE000,
  1163.     0x0000,0x0061,0x98FF,0xE000,0x0000,0x0063,0x1CBF,0xE000,
  1164.     0x0000,0x0063,0xFCB7,0xE000,0x0000,0x007F,0xFDFF,0xE000,
  1165.     0x0000,0x007F,0xFDFF,0xE000,0x0000,0x007F,0xFFFF,0xE000,
  1166.     0x0000,0x001F,0xFFFF,0xE000,0x0000,0x0000,0x0000,0x0000,
  1167.     0x0000,0x0000,0x0000,0x0000,0x07FF,0xFFFC,0x0000,0x0000,
  1168.     0x0FFF,0xFFFC,0x0000,0x0000,0x0EAA,0xAABC,0x0000,0x0000,
  1169.     0x0F55,0x555C,0x0000,0x0000,0x0EAA,0xAABC,0x0000,0x0000,
  1170.     0x0F55,0x555C,0x0000,0x0000,0x0EAA,0xAABC,0x0000,0x0000,
  1171.     0x0F55,0x555C,0x0000,0x0000,0x0EAA,0xAABC,0x0000,0x0000,
  1172.     0x0FFF,0xFFFC,0x0000,0x0000,0x0FFF,0xFFFC,0x0000,0x0000,
  1173.     0x0FFF,0xFFFC,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
  1174.     0x7FFF,0xFFFF,0xC000,0x0000,0xFFFF,0xFFFF,0xC000,0x0000,
  1175.     0xFFEA,0xABFF,0xC000,0x0000,0xFFE0,0x03FF,0xFF00,0x0000,
  1176.     0xFFFF,0xFFFF,0xFFC0,0x0000,0xFFFF,0xFFFF,0xF9E0,0x0000,
  1177.     0x0000,0x007F,0xFDE0,0x0000,0x1FFF,0xFFC7,0xAF00,0x0000,
  1178.     0x0000,0x0007,0x5F00,0x0000,0x0000,0x000F,0xFF80,0x0000,
  1179.     0x0000,0x001F,0xFF00,0x0000,0x0000,0x0000,0x0000,0x0000
  1180. };
  1181.  
  1182. STATIC struct Image DropImage =
  1183. {
  1184.     0,0,
  1185.     52,38,2,
  1186.     DropData,
  1187.     0x03,0x00,
  1188.     NULL
  1189. };
  1190.  
  1191. struct DiskObject DropIcon =
  1192. {
  1193.     WB_DISKMAGIC,
  1194.     WB_DISKVERSION,
  1195.  
  1196.     NULL,
  1197.     175,18,
  1198.     52,39,
  1199.     0x0005,
  1200.     0x0003,
  1201.     0x0001,
  1202.     &DropImage,
  1203.     NULL,
  1204.     NULL,
  1205.     NULL,
  1206.     NULL,
  1207.     NULL,
  1208.     NULL,
  1209.  
  1210.     WBTOOL,
  1211.     NULL,
  1212.     NULL,
  1213.     NO_ICON_POSITION,
  1214.     NO_ICON_POSITION,
  1215.     NULL,
  1216.     NULL,
  1217.     8192
  1218. };
  1219.  
  1220.     /* Remember some of the incoming data. */
  1221.  
  1222. BOOL    RememberOutput,
  1223.     RememberInput,
  1224.  
  1225.     Recording,
  1226.     RecordingLine;
  1227.  
  1228.     /* Trap settings. */
  1229.  
  1230. BOOLEAN        WatchTraps;
  1231. BOOLEAN        TrapsChanged;
  1232. UBYTE        LastTraps[MAX_FILENAME_LENGTH];
  1233.  
  1234.     /* CR/LF receiver translation data. */
  1235.  
  1236. LONG        (* __regargs Translate_CR_LF)(register STRPTR Data,register LONG Size);
  1237.  
  1238.     /* End of line conversion labels. */
  1239.  
  1240. STRPTR EOL_Labels[] =
  1241. {
  1242.     "-",
  1243.     "«CR»",
  1244.     "«LF»",
  1245.     "«CR»«LF»",
  1246.     "«LF»«CR»",
  1247.  
  1248.     NULL
  1249. };
  1250.  
  1251.  
  1252. /**********************************************************************/
  1253.  
  1254.  
  1255.     /* Character access tables. */
  1256.  
  1257. STATIC UBYTE __far Table0[256] =
  1258. {
  1259.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1260.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1261.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1262.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1263.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1264.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1265.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1266.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1267.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1268.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1269.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1270.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1271.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1272.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1273.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1274.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1275. };
  1276.  
  1277. STATIC UBYTE __far Table1[256] =
  1278. {
  1279.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1280.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1281.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1282.     1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,
  1283.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1284.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1285.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1286.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1287.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1288.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1289.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1290.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1291.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1292.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1293.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1294.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1295. };
  1296.  
  1297. STATIC UBYTE __far Table2[256] =
  1298. {
  1299.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1300.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1301.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1302.     1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,0,
  1303.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1304.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1305.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1306.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1307.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1308.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1309.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1310.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1311.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1312.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1313.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1314.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1315. };
  1316.  
  1317. STATIC UBYTE __far Table3[256] =
  1318. {
  1319.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1320.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1321.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1322.     1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,1,
  1323.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1324.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1325.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1326.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1327.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1328.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1329.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1330.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1331.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1332.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1333.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1334.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1335. };
  1336.  
  1337. STATIC UBYTE __far Table4[256] =
  1338. {
  1339.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1340.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1341.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1342.     1,1,1,1,1,1,1,1,1,1,0,0,0,1,0,0,
  1343.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1344.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1345.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1346.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1347.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1348.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1349.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1350.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1351.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1352.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1353.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1354.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1355. };
  1356.  
  1357. STATIC UBYTE __far Table5[256] =
  1358. {
  1359.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1360.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1361.     1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1362.     1,1,1,1,1,1,1,1,1,1,0,1,0,0,0,0,
  1363.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1364.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1365.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1366.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1367.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1368.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1369.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1370.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1371.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1372.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1373.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1374.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1375. };
  1376.  
  1377. STATIC UBYTE __far Table6[256] =
  1378. {
  1379.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1380.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1381.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1382.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1383.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1384.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1385.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1386.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1387.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1388.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1389.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1390.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1391.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1392.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1393.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1394.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1395. };
  1396.  
  1397. STATIC UBYTE __far Term0[256] =
  1398. {
  1399.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1400.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1401.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1402.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1403.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1404.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1405.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1406.     1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,
  1407.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1408.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1409.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1410.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1411.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1412.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1413.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  1414.     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  1415. };
  1416.  
  1417.     /* This follows the control code information. */
  1418.  
  1419. struct ControlCode ANSICode[] =
  1420. {
  1421.     /* Single Character Sequences. */
  1422.  
  1423.     'D',    Table0,    NULL,     0 ,    1,    (EPTR)CursorScrollDown,    // IND
  1424.     'M',    Table0,    NULL,     0 ,    1,    (EPTR)CursorScrollUp,    // RI
  1425.     'E',    Table0,    NULL,     0 ,    1,    (EPTR)NextLine,        // NEL
  1426.     '7',    Table0,    NULL,     0 ,    1,    (EPTR)SaveCursor,    // DECSC
  1427.     '8',    Table0,    NULL,     0 ,    1,    (EPTR)LoadCursor,    // DECRC
  1428.     '=',    Table0,    NULL,     0 ,    1,    (EPTR)NumericAppMode,    // DECPAM
  1429.     '>',    Table0,    NULL,     0 ,    1,    (EPTR)NumericAppMode,    // DECPNM
  1430.     'N',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // SS2
  1431.     'O',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // SS3
  1432.     'H',    Table0,    NULL,     0 ,    1,    (EPTR)SetTab,        // HTS
  1433.     'P',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // DCS
  1434.     '/',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // ST
  1435.     'Z',    Table0,    NULL,     0 ,    1,    (EPTR)RequestTerminal,    // DECID
  1436.     'c',    Table0,    NULL,     0 ,    1,    (EPTR)Reset,        // RIS
  1437.     '<',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // VT52 "Enter ANSI mode"
  1438.     '~',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // LS1R
  1439.     'n',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // LS2
  1440.     0x7D,    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // LS2R
  1441.     'o',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // LS3
  1442.     '|',    Table0,    NULL,     0 ,    1,    (EPTR)Ignore,        // LS3R
  1443.  
  1444.     /* Double Character Sequences. */
  1445.  
  1446.     '[',    Table0,    NULL,    's',    2,    (EPTR)SaveCursor,
  1447.     '[',    Table0,    NULL,    'u',    2,    (EPTR)LoadCursor,
  1448.  
  1449.     '(',    Table0,    NULL,    'A',    2,    (EPTR)FontStuff,    // SCS
  1450.     '(',    Table0,    NULL,    'B',    2,    (EPTR)FontStuff,    // ASCII font
  1451.     '(',    Table0,    NULL,    '0',    2,    (EPTR)FontStuff,    // DEC special graphics font
  1452.     '(',    Table0,    NULL,    '<',    2,    (EPTR)Ignore,        // DEC supplemental font
  1453.     '(',    Table0,    NULL,    '4',    2,    (EPTR)Ignore,        // Dutch font
  1454.     '(',    Table0,    NULL,    '5',    2,    (EPTR)Ignore,        // Finnish font
  1455.     '(',    Table0,    NULL,    'C',    2,    (EPTR)Ignore,        // Finnish font
  1456.     '(',    Table0,    NULL,    'R',    2,    (EPTR)Ignore,        // French font
  1457.     '(',    Table0,    NULL,    'Q',    2,    (EPTR)Ignore,        // French Canadian font
  1458.     '(',    Table0,    NULL,    'K',    2,    (EPTR)Ignore,        // German font
  1459.     '(',    Table0,    NULL,    'Y',    2,    (EPTR)Ignore,        // Italian font
  1460.     '(',    Table0,    NULL,    '6',    2,    (EPTR)Ignore,        // Norwegian/Danish font
  1461.     '(',    Table0,    NULL,    'E',    2,    (EPTR)Ignore,        // Norwegian/Danish font
  1462.     '(',    Table0,    NULL,    'Z',    2,    (EPTR)Ignore,        // Spanish font
  1463.     '(',    Table0,    NULL,    '7',    2,    (EPTR)Ignore,        // Swedish font
  1464.     '(',    Table0,    NULL,    'H',    2,    (EPTR)Ignore,        // Swedish font
  1465.     '(',    Table0,    NULL,    '=',    2,    (EPTR)Ignore,        // Swiss font
  1466.  
  1467.     ')',    Table0,    NULL,    'A',    2,    (EPTR)FontStuff,    // SCS
  1468.     ')',    Table0,    NULL,    'B',    2,    (EPTR)FontStuff,    // ASCII font
  1469.     ')',    Table0,    NULL,    '0',    2,    (EPTR)FontStuff,    // DEC special graphics font
  1470.     ')',    Table0,    NULL,    '<',    2,    (EPTR)Ignore,        // DEC supplemental font
  1471.     ')',    Table0,    NULL,    '4',    2,    (EPTR)Ignore,        // Dutch font
  1472.     ')',    Table0,    NULL,    '5',    2,    (EPTR)Ignore,        // Finnish font
  1473.     ')',    Table0,    NULL,    'C',    2,    (EPTR)Ignore,        // Finnish font
  1474.     ')',    Table0,    NULL,    'R',    2,    (EPTR)Ignore,        // French font
  1475.     ')',    Table0,    NULL,    'Q',    2,    (EPTR)Ignore,        // French Canadian font
  1476.     ')',    Table0,    NULL,    'K',    2,    (EPTR)Ignore,        // German font
  1477.     ')',    Table0,    NULL,    'Y',    2,    (EPTR)Ignore,        // Italian font
  1478.     ')',    Table0,    NULL,    '6',    2,    (EPTR)Ignore,        // Norwegian/Danish font
  1479.     ')',    Table0,    NULL,    'E',    2,    (EPTR)Ignore,        // Norwegian/Danish font
  1480.     ')',    Table0,    NULL,    'Z',    2,    (EPTR)Ignore,        // Spanish font
  1481.     ')',    Table0,    NULL,    '7',    2,    (EPTR)Ignore,        // Swedish font
  1482.     ')',    Table0,    NULL,    'H',    2,    (EPTR)Ignore,        // Swedish font
  1483.     ')',    Table0,    NULL,    '=',    2,    (EPTR)Ignore,        // Swiss font
  1484.  
  1485.     '+',    Table0,    NULL,    'A',    2,    (EPTR)Ignore,        // British font
  1486.     '+',    Table0,    NULL,    'B',    2,    (EPTR)Ignore,        // ASCII font
  1487.     '+',    Table0,    NULL,    '0',    2,    (EPTR)Ignore,        // DEC special graphics font
  1488.     '+',    Table0,    NULL,    '<',    2,    (EPTR)Ignore,        // DEC supplemental font
  1489.     '+',    Table0,    NULL,    '4',    2,    (EPTR)Ignore,        // Dutch font
  1490.     '+',    Table0,    NULL,    '5',    2,    (EPTR)Ignore,        // Finnish font
  1491.     '+',    Table0,    NULL,    'C',    2,    (EPTR)Ignore,        // Finnish font
  1492.     '+',    Table0,    NULL,    'R',    2,    (EPTR)Ignore,        // French font
  1493.     '+',    Table0,    NULL,    'Q',    2,    (EPTR)Ignore,        // French Canadian font
  1494.     '+',    Table0,    NULL,    'K',    2,    (EPTR)Ignore,        // German font
  1495.     '+',    Table0,    NULL,    'Y',    2,    (EPTR)Ignore,        // Italian font
  1496.     '+',    Table0,    NULL,    '6',    2,    (EPTR)Ignore,        // Norwegian/Danish font
  1497.     '+',    Table0,    NULL,    'E',    2,    (EPTR)Ignore,        // Norwegian/Danish font
  1498.     '+',    Table0,    NULL,    'Z',    2,    (EPTR)Ignore,        // Spanish font
  1499.     '+',    Table0,    NULL,    '7',    2,    (EPTR)Ignore,        // Swedish font
  1500.     '+',    Table0,    NULL,    'H',    2,    (EPTR)Ignore,        // Swedish font
  1501.     '+',    Table0,    NULL,    '=',    2,    (EPTR)Ignore,        // Swiss font
  1502.  
  1503.     '*',    Table0,    NULL,    'A',    2,    (EPTR)Ignore,        // British font
  1504.     '*',    Table0,    NULL,    'B',    2,    (EPTR)Ignore,        // ASCII font
  1505.     '*',    Table0,    NULL,    '0',    2,    (EPTR)Ignore,        // DEC special graphics font
  1506.     '*',    Table0,    NULL,    '<',    2,    (EPTR)Ignore,        // DEC supplemental font
  1507.     '*',    Table0,    NULL,    '4',    2,    (EPTR)Ignore,        // Dutch font
  1508.     '*',    Table0,    NULL,    '5',    2,    (EPTR)Ignore,        // Finnish font
  1509.     '*',    Table0,    NULL,    'C',    2,    (EPTR)Ignore,        // Finnish font
  1510.     '*',    Table0,    NULL,    'R',    2,    (EPTR)Ignore,        // French font
  1511.     '*',    Table0,    NULL,    'Q',    2,    (EPTR)Ignore,        // French Canadian font
  1512.     '*',    Table0,    NULL,    'K',    2,    (EPTR)Ignore,        // German font
  1513.     '*',    Table0,    NULL,    'Y',    2,    (EPTR)Ignore,        // Italian font
  1514.     '*',    Table0,    NULL,    '6',    2,    (EPTR)Ignore,        // Norwegian/Danish font
  1515.     '*',    Table0,    NULL,    'E',    2,    (EPTR)Ignore,        // Norwegian/Danish font
  1516.     '*',    Table0,    NULL,    'Z',    2,    (EPTR)Ignore,        // Spanish font
  1517.     '*',    Table0,    NULL,    '7',    2,    (EPTR)Ignore,        // Swedish font
  1518.     '*',    Table0,    NULL,    'H',    2,    (EPTR)Ignore,        // Swedish font
  1519.     '*',    Table0,    NULL,    '=',    2,    (EPTR)Ignore,        // Swiss font
  1520.  
  1521.     '#',    Table0,    NULL,    '3',    2,    (EPTR)ScaleFont,    // DECHDL (top half)
  1522.     '#',    Table0,    NULL,    '4',    2,    (EPTR)ScaleFont,    // DECHDL (bottom half)
  1523.     '#',    Table0,    NULL,    '5',    2,    (EPTR)ScaleFont,    // DECSWL
  1524.     '#',    Table0,    NULL,    '6',    2,    (EPTR)ScaleFont,    // DECDWL
  1525.     '#',    Table0,    NULL,    '8',    2,    (EPTR)AlignmentTest,    // DECALN
  1526.     ' ',    Table0,    NULL,    'F',    2,    (EPTR)Ignore,        // S7C1T
  1527.     ' ',    Table0,    NULL,    'G',    2,    (EPTR)Ignore,        // C8C1T
  1528.  
  1529.     /* Multiple Character Sequence. */
  1530.  
  1531.     '(',    Table6,    Term0,    'D',    0,    (EPTR)Ignore,        // SCS
  1532.  
  1533.     '[',    Table3,    NULL,    'i',    0,    (EPTR)PrinterController,    // Print mode
  1534.  
  1535.     '[',    Table3,    NULL,    'n',    0,    (EPTR)RequestInformation,    // DSR
  1536.     '[',    Table3,    NULL,    'c',    0,    (EPTR)RequestTerminal,    // DA
  1537.     '[',    Table3,    NULL,    'h',    0,    (EPTR)SetSomething,    // Terminal modes
  1538.     '[',    Table3,    NULL,    'l',    0,    (EPTR)SetSomething,    // Terminal modes
  1539.  
  1540.     '[',    Table4,    NULL,    'h',    0,    (EPTR)Ignore,
  1541.     '[',    Table5,    NULL,    'p',    0,    (EPTR)Ignore,        // DECSCL
  1542.  
  1543.     '[',    Table1,    NULL,    'A',    0,    (EPTR)MoveCursor,    // CUU
  1544.     '[',    Table1,    NULL,    'B',    0,    (EPTR)MoveCursor,    // CUD
  1545.     '[',    Table1,    NULL,    'C',    0,    (EPTR)MoveCursor,    // CUF
  1546.     '[',    Table1,    NULL,    'D',    0,    (EPTR)MoveCursor,    // CUB
  1547.     '[',    Table1,    NULL,    'G',    0,    (EPTR)MoveColumn,
  1548.     '[',    Table3,    NULL,    'K',    0,    (EPTR)EraseLine,    // EL/DECSEL
  1549.     '[',    Table3,    NULL,    'J',    0,    (EPTR)EraseScreen,    // ED/DECSED
  1550.     '[',    Table1,    NULL,    'P',    0,    (EPTR)EraseCharacters,    // DCH
  1551.     '[',    Table1,    NULL,    'X',    0,    (EPTR)EraseCharacters,    // ECH (sort of)
  1552.     '[',    Table1,    NULL,    '@',    0,    (EPTR)InsertCharacters,    // ICH
  1553.     '[',    Table1,    NULL,    'L',    0,    (EPTR)InsertLine,    // IL
  1554.     '[',    Table1,    NULL,    'M',    0,    (EPTR)ClearLine,    // DL
  1555.     '[',    Table1,    NULL,    'g',    0,    (EPTR)SetTabs,        // TBC
  1556.     '[',    Table5,    NULL,    'q',    0,    (EPTR)Ignore,        // DECSCA
  1557.  
  1558.     '[',    Table2,    NULL,    'H',    0,    (EPTR)SetAbsolutePosition,    // CUP
  1559.     '[',    Table2,    NULL,    'f',    0,    (EPTR)SetTopPosition,    // HVP
  1560.     '[',    Table2,    NULL,    'm',    0,    (EPTR)SetAttributes,    // SGR
  1561.     '[',    Table2,    NULL,    'y',    0,    (EPTR)Ignore,        // DECTST
  1562.     '[',    Table2,    NULL,    'r',    0,    (EPTR)SetRegion,    // DECSTBM
  1563.  
  1564.     '[',    Table1,    NULL,    'S',    0,    (EPTR)ScrollUp,
  1565.     '[',    Table1,    NULL,    'T',    0,    (EPTR)ScrollDown,
  1566.     '[',    Table1,    NULL,    'E',    0,    (EPTR)MoveCursorDown,
  1567.     '[',    Table1,    NULL,    'F',    0,    (EPTR)MoveCursorUp
  1568. };
  1569.  
  1570. WORD NumCodes = sizeof(ANSICode) / sizeof(struct ControlCode);
  1571.  
  1572.  
  1573. /**********************************************************************/
  1574.  
  1575.  
  1576. struct SignalSemaphore    ARexxQueueSemaphore;
  1577. struct List        ARexxQueue;
  1578. BOOL            ARexxRunning;
  1579.  
  1580.  
  1581. /**********************************************************************/
  1582.  
  1583.  
  1584. UWORD            PenTable[16];
  1585. UBYTE            TextAttributeTable[16];
  1586. WORD            ForegroundPen,
  1587.             BackgroundPen;
  1588.  
  1589.  
  1590. /**********************************************************************/
  1591.  
  1592.  
  1593. BOOL            ChatMode;
  1594. ULONG            SliderType;
  1595.  
  1596.  
  1597. /**********************************************************************/
  1598.  
  1599.  
  1600. ColourTable        *NormalColourTable,
  1601.             *BlinkColourTable,
  1602.             *ANSIColourTable,
  1603.             *EGAColourTable,
  1604.             *DefaultColourTable,
  1605.             *MonoColourTable;
  1606.  
  1607.  
  1608. /**********************************************************************/
  1609.  
  1610.  
  1611. UBYTE             Language[80];
  1612.